home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 2
/
Amiga Tools 2.iso
/
tex
/
macros
/
source
/
contrib
/
supported
/
xypic
/
src
/
xyps-txt.doc
< prev
next >
Wrap
Text File
|
1995-03-15
|
5KB
|
151 lines
%% $Id: xyps-txt.doc,v 2.10 1994/06/15 12:46:03 ross Exp $
%%
%% XY-pic ``Textures driver''.
%% Copyright (c) 1993-1994 Ross Moore <ross@mpce.mq.edu.au>
%%
%% This file is part of the XY-pic package for graphs and diagrams in TeX.
%% See the companion README and INSTALL files for further information.
%% Copyright (c) 1991-1994 Kristoffer H. Rose <kris@diku.dk>
%%
%% The XY-pic package is free software; you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published by the
%% Free Software Foundation; either version 2 of the License, or (at your
%% option) any later version.
%%
%% The XY-pic package is distributed in the hope that it will be useful, but
%% WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
%% or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
%% for more details.
%%
%% You should have received a copy of the GNU General Public License along
%% with this package; if not, write to the Free Software Foundation, Inc.,
%% 675 Mass Ave, Cambridge, MA 02139, USA.
%%
\ifx\xypsdviloaded\relax \message{not reloaded}\endinput \fi
\let\xypsdviloaded=\relax \xycatcodes
\DOCMODE3%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
This included file (version \stripRCS$Revision: 2.10 $) provides \XY-ps
support for the DVI driver of \Textures.\footnote{\Textures\ is a product of
Blue Sky Research. \XY-ps has been tested on versions 1.5b and later; no
guarantee is given for earlier versions.} for the
Macintosh.\footnote{Macintosh is a trademark of Apple Computer Inc.}
\DOCMODE2%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\DOCHEADER
\Textures\ has only one kind of |\special|,
which must be used with the three classes of \PS\ command,
and another for the ``raw'' \PS\ commands.
All \PS\ provided using |\special|s is executed in the environment
defined by the dictionary called |userdict|.
\DOCMODE(
\xydef@\TexturesSpecial@#1{\firstPS@@\special{postscript #1}}
\xydef@\TexturesMacro@#1{\firstPS@@\special{postscript mark{#1}xy}}
\xydef@\TexturesInclude@#1{\firstPS@@\special{rawpostscriptfile #1}}
\xydef@\TexturesRaw@#1{\firstPS@@\special{rawpostscript #1}}%
\DOCMODE)
\HACK: \Textures\ requires the \PS\ dictionary to be shipped-out with
every page. To achieve this efficiently we rebind |\shipout|, as described in
the documentation for \XY-ps.
\DOCMODE(
\xydef@\Textures@@{\gdef\dvitype@{Textures }\dvimessage@
\global\let\PSspecial@=\TexturesSpecial@
\global\let\PSmacro@=\TexturesMacro@
\global\let\PSdict@=\TexturesMacro@
\global\let\PSraw@=\TexturesRaw@
\global\let\PSinclude@=\TexturesInclude@
\global\let\xyPSobeylines@=\obeyTextureslines@
\ifUsePSdict@@
\global\let\XYdict@=\includeXYPSdict@ \fi
\gdef\firstPS@@{\firstPS@ \@PSshipout}%
\gdef\endXYdict@{\firstPS@}%
\xyPSshapes@true
}%
\xywarnifdefined\obeyTextureslines@
{\catcode`\^^M=\active
\gdef\obeyTextureslines@{\catcode`\^^M=\active \let^^M=\par \obeyspaces}}
\DOCMODE)
Do it now.
\DOCMODE(
\Textures@@
\DOCMODE)
This is the default |\xyPScurrpt@@|.
\DOCMODE(
\gdef\xyPScurrpt@@{\PSspecial@{userdict begin
0 0 transform grestore gsave itransform
/xyYpos exch def /xyXpos exch def end}}
\DOCMODE)
\DOCMODE2%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\paragraph*{Rotations and Scaling}
\DOCMODE(
\xywithoption{line}{%
\xyinputorelse@{xyps-l.tex}{\xyerror@{Could not load xyps-l.tex}{}}}
\xycatcodes
\xywithoption{rotate}{%
\xyinputorelse@{xyps-r.tex}{\xyerror@{Could not load xyps-r.tex}{}}}
\xycatcodes
\DOCMODE)
\DOCMODE2%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\paragraph*{Extra Colours}
Temporary: load all the colours anyway, while |xycolor| remains unwritten.
\DOCMODE(
\xywithoption{color}{%
\xyinputorelse@{xyps-col.tex}{\xyerror@{Could not load xyps-col.tex}{}}}
\xycatcodes
\xyinputorelse@{xyps-c.tex}{\xyerror@{Could not load xyps-c.tex}{}}
\xycatcodes
\xyinputorelse@{xyps-col.tex}{\xyerror@{Could not load xyps-col.tex}{}}
\xycatcodes
\DOCMODE)
\DOCMODE2%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\paragraph*{The end \& Log}\leavevmode
\DOCMODE(
\xyendinput
% $Log: xyps-txt.doc,v $
% Revision 2.10 1994/06/15 12:46:03 ross
% Second release 3beta.
% Colour and line style saving works; label colouring bug fixed.
%
% Revision 2.10 1994/06/15 12:46:03 ross
% Second release 3beta.
% Colour and line style saving works; label colouring bug fixed.
%
% Revision 2.9 1994/06/09 14:38:56 ross
% Release 3beta.
% Includes support for special effects: Rotations, Scaling, Line-width, Colour.
% Back-ends are separated into separate files.
% More back-ends are supported, experimentally --- needs testing.
%
% NEW for version 2.9 by Ross Moore.
\DOCMODE)
\DOCMODE3%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Tell Emacs that this is a LaTeX document and how it is formatted:
% Local Variables:
% mode:latex
% fill-column:77
% fill-prefix:""
% End: